home *** CD-ROM | disk | FTP | other *** search
/ Electronics Boutique Catalog 1996 Spring / 1996 Electronics Boutique Spring CD-ROM (USA).bin / eb / demos / c64demo.dir / 00058_Act 3.ls < prev    next >
Encoding:
Text File  |  1995-12-07  |  520 b   |  27 lines

  1. on mouseDown
  2.   puppetSound("MoreB")
  3.   puppetSprite(1, 1)
  4.   set the castNum of sprite 1 to 39
  5.   updateStage()
  6.   startTimer()
  7.   repeat while the timer < 15
  8.     nothing()
  9.   end repeat
  10.   set the castNum of sprite 1 to 92
  11.   updateStage()
  12.   startTimer()
  13.   repeat while the timer < 15
  14.     nothing()
  15.   end repeat
  16.   set the castNum of sprite 1 to 39
  17.   updateStage()
  18.   startTimer()
  19.   repeat while the timer < 15
  20.     nothing()
  21.   end repeat
  22.   set the castNum of sprite 1 to 92
  23.   updateStage()
  24.   puppetSprite(1, 0)
  25.   go("fade3")
  26. end
  27.